Revista CD Expert 8/Revista CD Expert nº 08 CD1.iso/Utilitarios/Especiais/Hotdog 5.5/hotdog55install.exe/%MAINDIR%/HotDog5.exe/0/RCDATA/TFRMFONTDLG/TFRMFONTDLG.txt

Text File | 1999-04-29 | 6.0 KB | 269 lines

object frmFontDlg: TfrmFontDlg
  Left = 338
  Top = 339
  HelpContext = 159
  BorderIcons = [biSystemMenu, biHelp]
  BorderStyle = bsDialog
  Caption = 'Font'
  ClientHeight = 239
  ClientWidth = 421
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Pitch = fpVariable
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel2: TBevel
    Left = 0
    Top = 0
    Width = 421
    Height = 203
    Align = alClient
    Style = bsRaised
  end
  object Label24: TLabel
    Left = 8
    Top = 7
    Width = 407
    Height = 14
    AutoSize = False
    Caption = 'Make changes to your text with the Font properties.'
  end
  object Bevel1: TBevel
    Left = 0
    Top = 203
    Width = 421
    Height = 36
    Align = alBottom
    Style = bsRaised
  end
  object GroupBox1: TGroupBox
    Left = 6
    Top = 25
    Width = 409
    Height = 174
    Caption = 'Font Details'
    TabOrder = 0
    object Label1: TLabel
      Left = 10
      Top = 22
      Width = 27
      Height = 13
      AutoSize = False
      Caption = '&Font:'
      FocusControl = cmbFontName
    end
    object Label3: TLabel
      Left = 188
      Top = 22
      Width = 23
      Height = 13
      AutoSize = False
      Caption = 'Si&ze:'
      FocusControl = cmbFontSize
    end
    object Label4: TLabel
      Left = 268
      Top = 22
      Width = 29
      Height = 13
      AutoSize = False
      Caption = 'Color:'
    end
    object btnEditFont: TSpeedButton
      Left = 160
      Top = 19
      Width = 23
      Height = 19
      Hint = 'Edit Degradable Fonts'
      ParentShowHint = False
      ShowHint = True
      OnClick = btnEditFontClick
    end
    object cmbFontName: TComboBox
      Left = 39
      Top = 18
      Width = 122
      Height = 21
      HelpContext = 466
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
      OnChange = cmbFontNameChange
    end
    object cmbFontSize: TComboBox
      Left = 214
      Top = 18
      Width = 49
      Height = 21
      HelpContext = 467
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnChange = cmbFontSizeChange
    end
    object GroupBox2: TGroupBox
      Left = 8
      Top = 48
      Width = 393
      Height = 66
      Caption = 'Options'
      TabOrder = 3
      object btnMacro: TSpeedButton
        Left = 276
        Top = 36
        Width = 109
        Height = 25
        Caption = 'Create Macro'
        Glyph.Data = {
          36010000424D3601000000000000760000002800000012000000100000000100
          040000000000C0000000120B0000120B00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777770030007777777047047777770077777777770774774777770077777777
          77077C77C777770077777747707707C77C77770077777747707707C77C777700
          7747777477077C77C77CCC00774777F8880774774777CC00777477F998704704
          77747C0077F8FFF9988870470447770077F9F9999998777777777700FFF9F999
          9998777777777700F999FFF99FFF777777777700F99977F99F77777777777700
          FFF977FFFF7777777777770077F97777777777777777770077FF}
        OnClick = btnMacroClick
      end
      object chkBold: TCheckBox
        Left = 30
        Top = 15
        Width = 97
        Height = 17
        HelpContext = 469
        Caption = '&Bold'
        TabOrder = 0
        OnClick = chkBoldClick
      end
      object chkItalic: TCheckBox
        Left = 162
        Top = 15
        Width = 97
        Height = 17
        HelpContext = 471
        Caption = '&Italic'
        TabOrder = 1
        OnClick = chkItalicClick
      end
      object chkUnderline: TCheckBox
        Left = 276
        Top = 15
        Width = 91
        Height = 17
        HelpContext = 473
        Caption = '&Underline'
        TabOrder = 2
        OnClick = chkUnderlineClick
      end
      object chkSuper: TCheckBox
        Left = 30
        Top = 44
        Width = 97
        Height = 17
        HelpContext = 470
        Caption = 'Su&perscript'
        TabOrder = 3
        OnClick = chkSuperClick
      end
      object chkSub: TCheckBox
        Left = 160
        Top = 42
        Width = 97
        Height = 17
        HelpContext = 472
        Caption = '&Subscript'
        TabOrder = 4
        OnClick = chkSubClick
      end
      object chkBlink: TCheckBox
        Left = 112
        Top = 14
        Width = 27
        Height = 17
        HelpContext = 474
        Caption = 'B&linking'
        TabOrder = 5
        Visible = False
      end
    end
    object pnlColour: TSausColourPicker
      Left = 300
      Top = 16
      Width = 99
      Height = 29
      HelpContext = 468
      TabOrder = 2
      OnChange = pnlColour1Click
      Version = '1.29'
      Warnings = False
    end
    object Panel1: TPanel
      Left = 8
      Top = 118
      Width = 392
      Height = 52
      BevelOuter = bvLowered
      TabOrder = 4
      object webPreview: TWebRover
        Left = 1
        Top = 1
        Width = 390
        Height = 50
        Cursor = crIBeam
        ViewImages = False
        TabOrder = 0
        Align = alClient
        BorderStyle = htNone
        HistoryMaxCount = 0
        DefFontName = 'Times New Roman'
        DefPreFontName = 'Courier New'
        NoSelect = False
        ScrollBars = ssVertical
        WebActive = False
        TimeOut = 0
      end
    end
  end
  object butOK: TButton
    Left = 261
    Top = 209
    Width = 75
    Height = 25
    Caption = '&OK'
    Default = True
    ModalResult = 1
    TabOrder = 2
    OnClick = butOKClick
  end
  object butCancel: TButton
    Left = 339
    Top = 209
    Width = 75
    Height = 25
    Cancel = True
    Caption = '&Cancel'
    ModalResult = 2
    TabOrder = 3
  end
  object btnHelp: TButton
    Left = 7
    Top = 209
    Width = 75
    Height = 25
    Caption = '&Help'
    TabOrder = 1
    OnClick = btnHelpClick
  end
end